home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 24 / AACD 24.iso / AACD / Programming / Emperor4.1 / Emperor / Projects / AminetSearcher / AminetSearcher.c < prev    next >
Encoding:
C/C++ Source or Header  |  2001-07-16  |  121.4 KB  |  1,773 lines

  1. /* code was generated by Emperor */
  2.  
  3. #define CATCOMP_NUMBERS
  4. #define CATCOMP_STRINGS
  5. #define ALL_REACTION_CLASSES
  6. #define ALL_REACTION_MACROS
  7. #include <stdio.h>
  8. #include <stdlib.h>
  9. #include <string.h>
  10. #include <clib/alib_protos.h>
  11. #include <clib/asl_protos.h>
  12. #include <clib/dos_protos.h>
  13. #include <clib/exec_protos.h>
  14. #include <clib/gadtools_protos.h>
  15. #include <clib/graphics_protos.h>
  16. #include <clib/intuition_protos.h>
  17. #include <clib/locale_protos.h>
  18. #include <clib/utility_protos.h>
  19. #include <clib/wb_protos.h>
  20. #include <clib/colorwheel_protos.h>
  21. #include <clib/datebrowser_protos.h>
  22. #include <clib/resource_protos.h>
  23. #include <clib/texteditor_protos.h>
  24. #include <gadgets/colorwheel.h>
  25. #include <gadgets/datebrowser.h>
  26. #include <gadgets/gradientslider.h>
  27. #include <gadgets/tapedeck.h>
  28. #include <gadgets/texteditor.h>
  29. #include <proto/texteditor.h>
  30. #include <reaction/reaction.h>
  31. #include <intuition/icclass.h>
  32. #include <intuition/imageclass.h>
  33. #include <intuition/gadgetclass.h>
  34. #include <workbench/startup.h>
  35. #include <wbstartup.h>
  36.  
  37. #define TapeDeckObject   NewObject(NULL, "tapedeck.gadget"
  38. #define TextEditorObject NewObject(TEXTEDITOR_GetClass(), NULL
  39.  
  40. #define LOCALE_WINDOW_TITLE1 GetCatalogStr(Catalog, 0, "AminetSearcher Version 1.5")
  41. #define LOCALE_SCREEN_TITLE1 GetCatalogStr(Catalog, 1, "AminetSearcher Version 1.5   created by Emperor")
  42. #define LOCALE_ICONIFIED_TITLE1 GetCatalogStr(Catalog, 2, "Iconified Program")
  43. #define LOCALE_PATTERN1 GetCatalogStr(Catalog, 3, "Pattern #1")
  44. #define LOCALE_PATTERN2 GetCatalogStr(Catalog, 4, "Pattern #2")
  45. #define LOCALE_PATTERN3 GetCatalogStr(Catalog, 5, "Pattern #3")
  46. #define LOCALE_PATTERN4 GetCatalogStr(Catalog, 6, "Pattern #4")
  47. #define LOCALE_PATTERN5 GetCatalogStr(Catalog, 7, "Pattern #5")
  48. #define LOCALE_ALLCDS GetCatalogStr(Catalog, 8, "all CDs")
  49. #define LOCALE_ONECD GetCatalogStr(Catalog, 9, "one CD")
  50. #define LOCALE_REQUEST_INFO_TITLE GetCatalogStr(Catalog, 10, "Program information")
  51. #define LOCALE_REQUEST_INFO_BODY GetCatalogStr(Catalog, 11, " AminetSearcher was written by Matthias Gietzelt \n AminetSearcher was created with Emperor")
  52. #define LOCALE_REQUEST_INFO_GADGET GetCatalogStr(Catalog, 12, "Okay")
  53. #define LOCALE_REQUEST_QUIT_TITLE GetCatalogStr(Catalog, 13, "Program request")
  54. #define LOCALE_REQUEST_QUIT_BODY GetCatalogStr(Catalog, 14, " Do you really want to quit this program ?")
  55. #define LOCALE_REQUEST_QUIT_GADGET GetCatalogStr(Catalog, 15, "Okay|No")
  56. #define LOCALE_REQUEST_ERROR1_TITLE GetCatalogStr(Catalog, 16, "Program error")
  57. #define LOCALE_REQUEST_ERROR1_BODY GetCatalogStr(Catalog, 17, "An error has been occured: Can't get Aminet-Index !")
  58. #define LOCALE_REQUEST_ERROR1_GADGET GetCatalogStr(Catalog, 18, "Okay")
  59. #define LOCALE_REQUEST_EXTRACT_TITLE GetCatalogStr(Catalog, 19, "AminetSearcher request")
  60. #define LOCALE_REQUEST_EXTRACT_BODY GetCatalogStr(Catalog, 20, " What do you want to do ? ")
  61. #define LOCALE_REQUEST_EXTRACT_GADGET GetCatalogStr(Catalog, 21, "Readme|Extract|Break")
  62. #define LOCALE_REQUEST_NOPATT_TITLE GetCatalogStr(Catalog, 22, "AminetSearcher request")
  63. #define LOCALE_REQUEST_NOPATT_BODY GetCatalogStr(Catalog, 23, " You must set a search-pattern ! ")
  64. #define LOCALE_REQUEST_NOPATT_GADGET GetCatalogStr(Catalog, 24, "Okay")
  65. #define LOCALE_PROJECT GetCatalogStr(Catalog, 25, "Project")
  66. #define LOCALE_MENU_PREFS GetCatalogStr(Catalog, 26, "Prefs")
  67. #define LOCALE_MENU_INFO GetCatalogStr(Catalog, 27, "Info")
  68. #define LOCALE_MENU_QUIT GetCatalogStr(Catalog, 28, "Quit")
  69. #define LOCALE_MENU_EXTRA GetCatalogStr(Catalog, 29, "Extra")
  70. #define LOCALE_MENU_SELECTALL GetCatalogStr(Catalog, 30, "Select all")
  71. #define LOCALE_SELECTNONE GetCatalogStr(Catalog, 31, "Select none")
  72. #define LOCALE_SCAN_IN_LHA GetCatalogStr(Catalog, 32, "scan in LhA")
  73. #define LOCALE_SEARCH GetCatalogStr(Catalog, 33, "Search")
  74. #define LOCALE_BREAK GetCatalogStr(Catalog, 34, "Break")
  75. #define LOCALE_SINGLE_CDs GetCatalogStr(Catalog, 35, "Single CDs")
  76. #define GADHELP_STRING1 GetCatalogStr(Catalog, 36, "Input searchpattern #1")
  77. #define GADHELP_STRING2 GetCatalogStr(Catalog, 37, "Input searchpattern #2")
  78. #define GADHELP_STRING3 GetCatalogStr(Catalog, 38, "Input searchpattern #3")
  79. #define GADHELP_STRING4 GetCatalogStr(Catalog, 39, "Input searchpattern #4")
  80. #define GADHELP_STRING5 GetCatalogStr(Catalog, 40, "Input searchpattern #5")
  81. #define GADHELP_CHECK1 GetCatalogStr(Catalog, 41, "When searching through LhA-files, check directory: biz")
  82. #define GADHELP_CHECK2 GetCatalogStr(Catalog, 42, "When searching through LhA-files, check directory: comm")
  83. #define GADHELP_CHECK3 GetCatalogStr(Catalog, 43, "When searching through LhA-files, check directory: demo")
  84. #define GADHELP_CHECK4 GetCatalogStr(Catalog, 44, "When searching through LhA-files, check directory: dev")
  85. #define GADHELP_CHECK5 GetCatalogStr(Catalog, 45, "When searching through LhA-files, check directory: disk")
  86. #define GADHELP_CHECK6 GetCatalogStr(Catalog, 46, "When searching through LhA-files, check directory: docs")
  87. #define GADHELP_CHECK7 GetCatalogStr(Catalog, 47, "When searching through LhA-files, check directory: game")
  88. #define GADHELP_CHECK8 GetCatalogStr(Catalog, 48, "When searching through LhA-files, check directory: gfx")
  89. #define GADHELP_CHECK9 GetCatalogStr(Catalog, 49, "When searching through LhA-files, check directory: hard")
  90. #define GADHELP_CHECK10 GetCatalogStr(Catalog, 50, "When searching through LhA-files, check directory: misc")
  91. #define GADHELP_CHECK11 GetCatalogStr(Catalog, 51, "When searching through LhA-files, check directory: mods")
  92. #define GADHELP_CHECK12 GetCatalogStr(Catalog, 52, "When searching through LhA-files, check directory: mus")
  93. #define GADHELP_CHECK13 GetCatalogStr(Catalog, 53, "When searching through LhA-files, check directory: pix")
  94. #define GADHELP_CHECK14 GetCatalogStr(Catalog, 54, "When searching through LhA-files, check directory: text")
  95. #define GADHELP_CHECK15 GetCatalogStr(Catalog, 55, "When searching through LhA-files, check directory: util")
  96. #define GADHELP_CHECK16 GetCatalogStr(Catalog, 56, "Search trough LhA-files after given patterns")
  97. #define GADHELP_CHECK17 GetCatalogStr(Catalog, 57, "Aminetset or single Aminets")
  98. #define GADHELP_CHOOSER GetCatalogStr(Catalog, 58, "Choose searching through all or just one Aminet")
  99. #define GADHELP_BUTTON1 GetCatalogStr(Catalog, 59, "Start searching")
  100. #define GADHELP_BUTTON2 GetCatalogStr(Catalog, 60, "Break searching")
  101. #define GADHELP_LISTBROWSER GetCatalogStr(Catalog, 61, "List of founded files")
  102. #define GADHELP_FUELGAUGE1 GetCatalogStr(Catalog, 62, "Percent indicator #1 of searchposition")
  103. #define GADHELP_FUELGAUGE2 GetCatalogStr(Catalog, 63, "Percent indicator #2 of searchposition")
  104. #define GADHELP_STRING6 GetCatalogStr(Catalog, 64, "GadgetHelp and statusoutput-gadget")
  105.  
  106. #define Layout1 Gadget1[1]
  107. #define Layout2 Gadget1[2]
  108. #define Layout3 Gadget1[3]
  109. #define String1 Gadget1[4]
  110. #define Label1 Gadget1[5]
  111. #define String2 Gadget1[6]
  112. #define Label2 Gadget1[7]
  113. #define String3 Gadget1[8]
  114. #define Label3 Gadget1[9]
  115. #define String4 Gadget1[10]
  116. #define Label4 Gadget1[11]
  117. #define String5 Gadget1[12]
  118. #define Label5 Gadget1[13]
  119. #define Layout4 Gadget1[14]
  120. #define Layout5 Gadget1[15]
  121. #define Checkbox1 Gadget1[16]
  122. #define Checkbox2 Gadget1[17]
  123. #define Checkbox3 Gadget1[18]
  124. #define Checkbox4 Gadget1[19]
  125. #define Checkbox5 Gadget1[20]
  126. #define Layout6 Gadget1[21]
  127. #define Checkbox6 Gadget1[22]
  128. #define Checkbox7 Gadget1[23]
  129. #define Checkbox8 Gadget1[24]
  130. #define Checkbox9 Gadget1[25]
  131. #define Checkbox10 Gadget1[26]
  132. #define Layout7 Gadget1[27]
  133. #define Checkbox11 Gadget1[28]
  134. #define Checkbox12 Gadget1[29]
  135. #define Checkbox13 Gadget1[30]
  136. #define Checkbox14 Gadget1[31]
  137. #define Checkbox15 Gadget1[32]
  138. #define Layout8 Gadget1[33]
  139. #define Checkbox16 Gadget1[34]
  140. #define Checkbox17 Gadget1[35]
  141. #define Space1 Gadget1[36]
  142. #define Chooser1 Gadget1[37]
  143. #define Button1 Gadget1[38]
  144. #define Button2 Gadget1[39]
  145. #define Listbrowser1 Gadget1[40]
  146. #define Fuelgauge1 Gadget1[41]
  147. #define Fuelgauge2 Gadget1[42]
  148. #define String6 Gadget1[43]
  149.  
  150. #define Menu_Project 65504
  151. #define Menu_Info 63488
  152. #define Menu_Quit 63552
  153. #define Menu_Extra 65505
  154. #define Menu_Select_All 63489
  155. #define Menu_Select_None 63521
  156.  
  157. LONG Inforequest1(void);
  158. LONG Quitrequest1(void);
  159. LONG Errorrequest1(void);
  160. LONG Extractrequest1(void);
  161. LONG Nopatternrequest1(void);
  162. void String1_GadgetUp_Event(void);
  163. void String2_GadgetUp_Event(void);
  164. void String3_GadgetUp_Event(void);
  165. void String4_GadgetUp_Event(void);
  166. void String5_GadgetUp_Event(void);
  167. void Checkbox16_GadgetUp_Event(void);
  168. void Checkbox17_GadgetUp_Event(void);
  169. void Chooser1_GadgetUp_Event(void);
  170. void Button1_GadgetUp_Event(void);
  171. void Listbrowser1_GadgetUp_Event(void);
  172. void Menu_Info_MenuPick_Event(void);
  173. void Menu_Quit_MenuPick_Event(void);
  174. void Menu_Select_All_MenuPick_Event(void);
  175. void Menu_Select_None_MenuPick_Event(void);
  176. void Window1_CloseWindow_Event(void);
  177. void Emperor_InitProgram(void);
  178. void Emperor_QuitProgram(void);
  179. void Emperor_AllocChooserNode(struct List *, char **, WORD *);
  180. void Emperor_AllocClicktabNode(struct List *, char **, WORD *);
  181. void Emperor_AllocListbrowserNode(struct List *, char **, WORD *);
  182. void Emperor_AllocRadiobuttonNode(struct List *, char **, WORD *);
  183. void Emperor_AllocListbrowserGadToolsNode(struct List *, char **);
  184. void Emperor_CloseWindow_Window1(void);
  185. struct Window *Emperor_OpenWindow_Window1(void);
  186. STRPTR Emperor_GetGadgetAttr(struct Gadget *);
  187. void Emperor_SetGadgetAttr(struct Gadget *, STRPTR);
  188. void Emperor_SetGadgetDisabledAttr(struct Gadget *, BOOL);
  189. ULONG stringlength(STRPTR);
  190. LONG stringtoint(STRPTR);
  191. DOUBLE stringtofloat(STRPTR);
  192. STRPTR inttostring(LONG);
  193.  
  194. const char VERSION[] = "$VER: AminetSearcher 1.5 (15-Jul-2001)";
  195. const char AUTHOR[] = "Matthias Gietzelt";
  196.  
  197. BYTE Emperor_Gadgetkind1[] = { 0, 12, 12, 12, 20, 26, 20, 26, 20, 26, 20, 26, 20, 26, 12, 12, 1, 1, 1, 1, 1, 12, 1, 1, 1, 1, 1, 12, 1, 1, 1, 1, 1, 12, 1, 1, 18, 2, 0, 0, 13, 6, 6, 20, -1 };
  198. char *Chooserarrayraw[] = { "one CD", "all CDs", NULL };
  199. WORD Chooserarrayattr[] = { 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, NULL };
  200. char *founded_files_listraw[] = { NULL };
  201. WORD founded_files_listattr[] = { NULL };
  202.  
  203. struct ColumnInfo ListbrowserColumnInfo[] =
  204. {
  205.     { 100, "String", 0 },
  206.     { 100, "File", 0 },
  207.     { 100, "Dir", 0 },
  208.     { 100, "Length", 0 },
  209.     { 100, "Short", 0 },
  210.     { -1, (STRPTR)~0, -1 }
  211. };
  212.  
  213. struct NewMenu NewMenu[] =
  214. {
  215.     { NM_TITLE, 0, 0, 0, 0, 0 },
  216.     { NM_ITEM, 0, "I", 0, 0, 0 },
  217.     { NM_ITEM, NM_BARLABEL, 0, 0, 0, 0 },
  218.     { NM_ITEM, 0, "Q", 0, 0, 0 },
  219.     { NM_TITLE, 0, 0, 0, 0, 0 },
  220.     { NM_ITEM, 0, "A", 0, 0, 0 },
  221.     { NM_ITEM, 0, "N", 0, 0, 0 },
  222.     { NM_END, 0, 0, 0, 0, 0 }
  223. };
  224.  
  225. struct TextAttr XEN1 =
  226. {
  227.     "XEN.font",
  228.     8,
  229.     0,
  230.     FPF_DISKFONT
  231. };
  232.  
  233. void *vinfo = NULL;
  234. BOOL os35 = TRUE;
  235. BOOL terminated = FALSE;
  236. ULONG WindowSignals1 = 0L;
  237. Object *WindowObject1 = NULL;
  238. struct Catalog *Catalog = NULL;
  239. struct Gadget *Gadget1[44];
  240. struct Library *IntuitionBase = NULL;
  241. struct Library *LocaleBase = NULL;
  242. struct Library *GadToolsBase = NULL;
  243. struct Library *ASLBase = NULL;
  244. struct Library *DOSLibBase = NULL;
  245. struct Library *ResourceBase = NULL;
  246. struct Library *WindowBase = NULL;
  247. struct Library *RequesterBase = NULL;
  248. struct Library *ButtonBase = NULL;
  249. struct Library *CheckBoxBase = NULL;
  250. struct Library *ChooserBase = NULL;
  251. struct Library *ClickTabBase = NULL;
  252. struct Library *ColorWheelBase = NULL;
  253. struct Library *DateBrowserBase = NULL;
  254. struct Library *FuelGaugeBase = NULL;
  255. struct Library *GetFileBase = NULL;
  256. struct Library *GetFontBase = NULL;
  257. struct Library *GetScreenModeBase = NULL;
  258. struct Library *GradientSliderBase = NULL;
  259. struct Library *IntegerBase = NULL;
  260. struct Library *LayoutBase = NULL;
  261. struct Library *ListBrowserBase = NULL;
  262. struct Library *PaletteBase = NULL;
  263. struct Library *RadioButtonBase = NULL;
  264. struct Library *ScrollerBase = NULL;
  265. struct Library *SliderBase = NULL;
  266. struct Library *SpaceBase = NULL;
  267. struct Library *SpeedBarBase = NULL;
  268. struct Library *StringBase = NULL;
  269. struct Library *TapeDeckBase = NULL;
  270. struct Library *TextEditorBase = NULL;
  271. struct Library *BevelBase = NULL;
  272. struct Library *BitMapBase = NULL;
  273. struct Library *GlyphBase = NULL;
  274. struct Library *LabelBase = NULL;
  275. struct List Emperor_Chooser_Chooserarray;
  276. struct List Emperor_Clicktab_Chooserarray;
  277. struct List Emperor_Listbrowser_Chooserarray;
  278. struct List Emperor_Radiobutton_Chooserarray;
  279. struct List Emperor_Listbrowser_GadTools_Chooserarray;
  280. struct List Emperor_Chooser_founded_files_list;
  281. struct List Emperor_Clicktab_founded_files_list;
  282. struct List Emperor_Listbrowser_founded_files_list;
  283. struct List Emperor_Radiobutton_founded_files_list;
  284. struct List Emperor_Listbrowser_GadTools_founded_files_list;
  285. struct Menu *Menu = NULL;
  286. struct MsgPort *AppPort = NULL;
  287. struct MsgPort *MsgPort = NULL;
  288. struct Screen *Screen1 = NULL;
  289. struct Window *Window1 = NULL;
  290.  
  291. BOOL in_lha = FALSE;
  292. BOOL all_or_one_cd = FALSE;
  293. BOOL single = FALSE;
  294. LONG winbuff = 0;
  295. LONG entryzahl = 0;
  296. LONG filezahl = 0;
  297. LONG Seconds = 0;
  298. LONG Micros = 0;
  299.  
  300. void main(void)
  301. {
  302.     ULONG Emperor_Input = 0L;
  303.     ULONG Emperor_Code = 0L;
  304.     struct IntuiMessage *IntuiMessage = NULL;
  305.     struct Gadget *GadgetMessage = NULL;
  306.  
  307.     Emperor_InitProgram();
  308.     Emperor_OpenWindow_Window1();
  309.     while(!terminated)
  310.     {
  311.         Wait(WindowSignals1);
  312.         while((Emperor_Input = RA_HandleInput(WindowObject1, &Emperor_Code)) != WMHI_LASTMSG)
  313.         {
  314.             switch(Emperor_Input & WMHI_CLASSMASK)
  315.             {
  316.                 case WMHI_GADGETUP:
  317.                     switch(Emperor_Input & WMHI_GADGETMASK)
  318.                     {
  319.                         case 3: String1_GadgetUp_Event(); break;
  320.                         case 5: String2_GadgetUp_Event(); break;
  321.                         case 7: String3_GadgetUp_Event(); break;
  322.                         case 9: String4_GadgetUp_Event(); break;
  323.                         case 11: String5_GadgetUp_Event(); break;
  324.                         case 33: Checkbox16_GadgetUp_Event(); break;
  325.                         case 34: Checkbox17_GadgetUp_Event(); break;
  326.                         case 36: Chooser1_GadgetUp_Event(); break;
  327.                         case 37: Button1_GadgetUp_Event(); break;
  328.                         case 39: Listbrowser1_GadgetUp_Event(); break;
  329.                         default: break;
  330.                     }
  331.                     break;
  332.                 case WMHI_GADGETHELP:
  333.                     if(((Emperor_Input & WMHI_GADGETMASK) < 43) && (Emperor_Gadgetkind1[(Emperor_Input & WMHI_GADGETMASK) + 1] != -1) && (Emperor_Gadgetkind1[(Emperor_Input & WMHI_GADGETMASK) + 1] < 23)) Emperor_SetGadgetAttr(String6, (STRPTR) Gadget1[(Emperor_Input & WMHI_GADGETMASK) + 1]->UserData);
  334.                     switch(Emperor_Input & WMHI_GADGETMASK)
  335.                     {
  336.                         default: break;
  337.                     }
  338.                     break;
  339.                 case WMHI_MENUPICK:
  340.                     switch(Emperor_Input & WMHI_MENUMASK)
  341.                     {
  342.                         case Menu_Info: Menu_Info_MenuPick_Event(); break;
  343.                         case Menu_Quit: Menu_Quit_MenuPick_Event(); break;
  344.                         case Menu_Select_All: Menu_Select_All_MenuPick_Event(); break;
  345.                         case Menu_Select_None: Menu_Select_None_MenuPick_Event(); break;
  346.                         default: break;
  347.                     }
  348.                     break;
  349.                 case WMHI_MENUHELP:
  350.                     switch(Emperor_Input & WMHI_MENUMASK)
  351.                     {
  352.                         default: break;
  353.                     }
  354.                     break;
  355.                 case WMHI_CLOSEWINDOW:
  356.                     Window1_CloseWindow_Event();
  357.                     break;
  358.                 case WMHI_ICONIFY:
  359.                     break;
  360.                 case WMHI_UNICONIFY:
  361.                     break;
  362.                 case WMHI_ACTIVE:
  363.                     break;
  364.                 case WMHI_INACTIVE:
  365.                     break;
  366.                 case WMHI_RAWKEY:
  367.                     break;
  368.                 case WMHI_VANILLAKEY:
  369.                     break;
  370.                 case WMHI_MOUSEBUTTONS:
  371.                     break;
  372.                 case WMHI_MOUSEMOVE:
  373.                     break;
  374.                 case WMHI_NEWSIZE:
  375.                     break;
  376.                 case WMHI_CHANGEWINDOW:
  377.                     break;
  378.                 case WMHI_DISPOSEDWINDOW:
  379.                     break;
  380.                 case WMHI_INTUITICK:
  381.                     break;
  382.             }
  383.         }
  384.     }
  385.     Emperor_QuitProgram();
  386. }
  387.  
  388. void wbmain(struct WBStartup *Emperor_ArgMsg)
  389. {
  390.     main();
  391. }
  392.  
  393. LONG Inforequest1(void)
  394. {
  395.     struct EasyStruct EmperorRequest_Inforequest1;
  396.  
  397.     EmperorRequest_Inforequest1.es_StructSize = sizeof(struct EasyStruct);
  398.     EmperorRequest_Inforequest1.es_Flags = 0L;
  399.     EmperorRequest_Inforequest1.es_Title = (UBYTE *) LOCALE_REQUEST_INFO_TITLE;
  400.     EmperorRequest_Inforequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_INFO_BODY;
  401.     EmperorRequest_Inforequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_INFO_GADGET;
  402.     return(EasyRequest(Window1, &EmperorRequest_Inforequest1, NULL, NULL));
  403. }
  404.  
  405. LONG Quitrequest1(void)
  406. {
  407.     struct EasyStruct EmperorRequest_Quitrequest1;
  408.  
  409.     EmperorRequest_Quitrequest1.es_StructSize = sizeof(struct EasyStruct);
  410.     EmperorRequest_Quitrequest1.es_Flags = 0L;
  411.     EmperorRequest_Quitrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_QUIT_TITLE;
  412.     EmperorRequest_Quitrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_QUIT_BODY;
  413.     EmperorRequest_Quitrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_QUIT_GADGET;
  414.     return(EasyRequest(Window1, &EmperorRequest_Quitrequest1, NULL, NULL));
  415. }
  416.  
  417. LONG Errorrequest1(void)
  418. {
  419.     struct EasyStruct EmperorRequest_Errorrequest1;
  420.  
  421.     EmperorRequest_Errorrequest1.es_StructSize = sizeof(struct EasyStruct);
  422.     EmperorRequest_Errorrequest1.es_Flags = 0L;
  423.     EmperorRequest_Errorrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_ERROR1_TITLE;
  424.     EmperorRequest_Errorrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_ERROR1_BODY;
  425.     EmperorRequest_Errorrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_ERROR1_GADGET;
  426.     return(EasyRequest(Window1, &EmperorRequest_Errorrequest1, NULL, NULL));
  427. }
  428.  
  429. LONG Extractrequest1(void)
  430. {
  431.     struct EasyStruct EmperorRequest_Extractrequest1;
  432.  
  433.     EmperorRequest_Extractrequest1.es_StructSize = sizeof(struct EasyStruct);
  434.     EmperorRequest_Extractrequest1.es_Flags = 0L;
  435.     EmperorRequest_Extractrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_EXTRACT_TITLE;
  436.     EmperorRequest_Extractrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_EXTRACT_BODY;
  437.     EmperorRequest_Extractrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_EXTRACT_GADGET;
  438.     return(EasyRequest(Window1, &EmperorRequest_Extractrequest1, NULL, NULL));
  439. }
  440.  
  441. LONG Nopatternrequest1(void)
  442. {
  443.     struct EasyStruct EmperorRequest_Nopatternrequest1;
  444.  
  445.     EmperorRequest_Nopatternrequest1.es_StructSize = sizeof(struct EasyStruct);
  446.     EmperorRequest_Nopatternrequest1.es_Flags = 0L;
  447.     EmperorRequest_Nopatternrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_NOPATT_TITLE;
  448.     EmperorRequest_Nopatternrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_NOPATT_BODY;
  449.     EmperorRequest_Nopatternrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_NOPATT_GADGET;
  450.     return(EasyRequest(Window1, &EmperorRequest_Nopatternrequest1, NULL, NULL));
  451. }
  452.  
  453. void Emperor_InitProgram(void)
  454. {
  455.     UWORD Emperor_InitVar = 0;
  456.     char Emperor_OccuredError[50], Emperor_ExceptionString[300];
  457.     struct EasyStruct EmperorRequest_InitializationErrorRequest;
  458.  
  459.     IntuitionBase = OpenLibrary("intuition.library", 39L);
  460.     if(!IntuitionBase)
  461.     {
  462.         Emperor_InitVar = 1;
  463.         strcpy(Emperor_OccuredError, "intuition.library");
  464.     }
  465.     LocaleBase = OpenLibrary("locale.library", 39L);
  466.     if(!LocaleBase)
  467.     {
  468.         Emperor_InitVar = 1;
  469.         strcpy(Emperor_OccuredError, "locale.library");
  470.     }
  471.     GadToolsBase = OpenLibrary("gadtools.library", 39L);
  472.     if(!GadToolsBase)
  473.     {
  474.         Emperor_InitVar = 1;
  475.         strcpy(Emperor_OccuredError, "gadtools.library");
  476.     }
  477.     ASLBase = OpenLibrary("asl.library", 39L);
  478.     if(!ASLBase)
  479.     {
  480.         Emperor_InitVar = 1;
  481.         strcpy(Emperor_OccuredError, "asl.library");
  482.     }
  483.     DOSLibBase = OpenLibrary("dos.library", 39L);
  484.     if(!DOSLibBase)
  485.     {
  486.         Emperor_InitVar = 1;
  487.         strcpy(Emperor_OccuredError, "dos.library");
  488.     }
  489.     ResourceBase = OpenLibrary("resource.library", 44L);
  490.     if(!ResourceBase)
  491.     {
  492.         os35 = FALSE;
  493.         strcpy(Emperor_OccuredError, "resource.library");
  494.     }
  495.     WindowBase = OpenLibrary("window.class", 44L);
  496.     if(!WindowBase)
  497.     {
  498.         os35 = FALSE;
  499.         strcpy(Emperor_OccuredError, "window.class");
  500.     }
  501.     RequesterBase = OpenLibrary("requester.class", 42L);
  502.     if(!RequesterBase)
  503.     {
  504.         os35 = FALSE;
  505.         strcpy(Emperor_OccuredError, "requester.class");
  506.     }
  507.     ButtonBase = OpenLibrary("gadgets/button.gadget", 44L);
  508.     if(!ButtonBase)
  509.     {
  510.         os35 = FALSE;
  511.         strcpy(Emperor_OccuredError, "gadgets/button.gadget");
  512.     }
  513.     CheckBoxBase = OpenLibrary("gadgets/checkbox.gadget", 44L);
  514.     if(!CheckBoxBase)
  515.     {
  516.         os35 = FALSE;
  517.         strcpy(Emperor_OccuredError, "gadgets/checkbox.gadget");
  518.     }
  519.     ChooserBase = OpenLibrary("gadgets/chooser.gadget", 44L);
  520.     if(!ChooserBase)
  521.     {
  522.         os35 = FALSE;
  523.         strcpy(Emperor_OccuredError, "gadgets/chooser.gadget");
  524.     }
  525.     ClickTabBase = OpenLibrary("gadgets/clicktab.gadget", 44L);
  526.     if(!ClickTabBase)
  527.     {
  528.         os35 = FALSE;
  529.         strcpy(Emperor_OccuredError, "gadgets/clicktab.gadget");
  530.     }
  531.     ColorWheelBase = OpenLibrary("gadgets/colorwheel.gadget", 44L);
  532.     if(!ColorWheelBase)
  533.     {
  534.         os35 = FALSE;
  535.         strcpy(Emperor_OccuredError, "gadgets/colorwheel.gadget");
  536.     }
  537.     DateBrowserBase = OpenLibrary("gadgets/datebrowser.gadget", 44L);
  538.     if(!DateBrowserBase)
  539.     {
  540.         os35 = FALSE;
  541.         strcpy(Emperor_OccuredError, "gadgets/datebrowser.gadget");
  542.     }
  543.     FuelGaugeBase = OpenLibrary("gadgets/fuelgauge.gadget", 44L);
  544.     if(!FuelGaugeBase)
  545.     {
  546.         os35 = FALSE;
  547.         strcpy(Emperor_OccuredError, "gadgets/fuelgauge.gadget");
  548.     }
  549.     GetFileBase = OpenLibrary("gadgets/getfile.gadget", 44L);
  550.     if(!GetFileBase)
  551.     {
  552.         os35 = FALSE;
  553.         strcpy(Emperor_OccuredError, "gadgets/getfile.gadget");
  554.     }
  555.     GetFontBase = OpenLibrary("gadgets/getfont.gadget", 44L);
  556.     if(!GetFontBase)
  557.     {
  558.         os35 = FALSE;
  559.         strcpy(Emperor_OccuredError, "gadgets/getfont.gadget");
  560.     }
  561.     GetScreenModeBase = OpenLibrary("gadgets/getscreenmode.gadget", 44L);
  562.     if(!GetScreenModeBase)
  563.     {
  564.         os35 = FALSE;
  565.         strcpy(Emperor_OccuredError, "gadgets/getscreenmode.gadget");
  566.     }
  567.     GradientSliderBase = OpenLibrary("gadgets/gradientslider.gadget", 44L);
  568.     if(!GradientSliderBase)
  569.     {
  570.         os35 = FALSE;
  571.         strcpy(Emperor_OccuredError, "gadgets/gradientslider.gadget");
  572.     }
  573.     IntegerBase = OpenLibrary("gadgets/integer.gadget", 44L);
  574.     if(!IntegerBase)
  575.     {
  576.         os35 = FALSE;
  577.         strcpy(Emperor_OccuredError, "gadgets/integer.gadget");
  578.     }
  579.     LayoutBase = OpenLibrary("gadgets/layout.gadget", 44L);
  580.     if(!LayoutBase)
  581.     {
  582.         os35 = FALSE;
  583.         strcpy(Emperor_OccuredError, "gadgets/layout.gadget");
  584.     }
  585.     ListBrowserBase = OpenLibrary("gadgets/listbrowser.gadget", 44L);
  586.     if(!ListBrowserBase)
  587.     {
  588.         os35 = FALSE;
  589.         strcpy(Emperor_OccuredError, "gadgets/listbrowser.gadget");
  590.     }
  591.     PaletteBase = OpenLibrary("gadgets/palette.gadget", 44L);
  592.     if(!PaletteBase)
  593.     {
  594.         os35 = FALSE;
  595.         strcpy(Emperor_OccuredError, "gadgets/palette.gadget");
  596.     }
  597.     RadioButtonBase = OpenLibrary("gadgets/radiobutton.gadget", 44L);
  598.     if(!RadioButtonBase)
  599.     {
  600.         os35 = FALSE;
  601.         strcpy(Emperor_OccuredError, "gadgets/radiobutton.gadget");
  602.     }
  603.     ScrollerBase = OpenLibrary("gadgets/scroller.gadget", 44L);
  604.     if(!ScrollerBase)
  605.     {
  606.         os35 = FALSE;
  607.         strcpy(Emperor_OccuredError, "gadgets/scroller.gadget");
  608.     }
  609.     SliderBase = OpenLibrary("gadgets/slider.gadget", 44L);
  610.     if(!SliderBase)
  611.     {
  612.         os35 = FALSE;
  613.         strcpy(Emperor_OccuredError, "gadgets/slider.gadget");
  614.     }
  615.     SpaceBase = OpenLibrary("gadgets/space.gadget", 44L);
  616.     if(!SpaceBase)
  617.     {
  618.         os35 = FALSE;
  619.         strcpy(Emperor_OccuredError, "gadgets/space.gadget");
  620.     }
  621.     SpeedBarBase = OpenLibrary("gadgets/speedbar.gadget", 44L);
  622.     if(!SpeedBarBase)
  623.     {
  624.         os35 = FALSE;
  625.         strcpy(Emperor_OccuredError, "gadgets/speedbar.gadget");
  626.     }
  627.     StringBase = OpenLibrary("gadgets/string.gadget", 44L);
  628.     if(!StringBase)
  629.     {
  630.         os35 = FALSE;
  631.         strcpy(Emperor_OccuredError, "gadgets/string.gadget");
  632.     }
  633.     TapeDeckBase = OpenLibrary("gadgets/tapedeck.gadget", 40L);
  634.     if(!TapeDeckBase)
  635.     {
  636.         os35 = FALSE;
  637.         strcpy(Emperor_OccuredError, "gadgets/tapedeck.gadget");
  638.     }
  639.     TextEditorBase = OpenLibrary("gadgets/texteditor.gadget", 15L);
  640.     if(!TextEditorBase)
  641.     {
  642.         os35 = FALSE;
  643.         strcpy(Emperor_OccuredError, "gadgets/texteditor.gadget");
  644.     }
  645.     BevelBase = OpenLibrary("images/bevel.image", 44L);
  646.     if(!BevelBase)
  647.     {
  648.         os35 = FALSE;
  649.         strcpy(Emperor_OccuredError, "images/bevel.image");
  650.     }
  651.     BitMapBase = OpenLibrary("images/bitmap.image", 44L);
  652.     if(!BitMapBase)
  653.     {
  654.         os35 = FALSE;
  655.         strcpy(Emperor_OccuredError, "images/bitmap.image");
  656.     }
  657.     GlyphBase = OpenLibrary("images/glyph.image", 44L);
  658.     if(!GlyphBase)
  659.     {
  660.         os35 = FALSE;
  661.         strcpy(Emperor_OccuredError, "images/glyph.image");
  662.     }
  663.     LabelBase = OpenLibrary("images/label.image", 44L);
  664.     if(!LabelBase)
  665.     {
  666.         os35 = FALSE;
  667.         strcpy(Emperor_OccuredError, "images/label.image");
  668.     }
  669.     Catalog = OpenCatalogA(NULL, "AminetSearcher.catalog", NULL);
  670.     Screen1 = LockPubScreen(NULL);
  671.     if(!Screen1) Emperor_InitVar = 5;
  672.     else
  673.     {
  674.         vinfo = GetVisualInfo(Screen1, TAG_DONE);
  675.         if(!vinfo) Emperor_InitVar = 6;
  676.         else
  677.         {
  678.             NewMenu[0].nm_Label = LOCALE_PROJECT;
  679.             NewMenu[1].nm_Label = LOCALE_MENU_INFO;
  680.             NewMenu[2].nm_Label = NM_BARLABEL;
  681.             NewMenu[3].nm_Label = LOCALE_MENU_QUIT;
  682.             NewMenu[4].nm_Label = LOCALE_MENU_EXTRA;
  683.             NewMenu[5].nm_Label = LOCALE_MENU_SELECTALL;
  684.             NewMenu[6].nm_Label = LOCALE_SELECTNONE;
  685.             Menu = CreateMenus(NewMenu, GTMN_FullMenu, TRUE, TAG_DONE);
  686.             if(!Menu) Emperor_InitVar = 7;
  687.             else
  688.             {
  689.                 LayoutMenus(Menu, vinfo, GTMN_FrontPen, 0, TAG_DONE);
  690.  
  691.                 AppPort = CreateMsgPort();
  692.                 if(!AppPort) Emperor_InitVar = 8;
  693.  
  694.                 MsgPort = CreatePort("AminetSearcher_Port", 0);
  695.                 if(!MsgPort) Emperor_InitVar = 8;
  696.             }
  697.         }
  698.     }
  699.     strcpy(Chooserarrayraw[0], LOCALE_ONECD);
  700.     strcpy(Chooserarrayraw[1], LOCALE_ALLCDS);
  701.     if(os35)
  702.     {
  703.         Emperor_AllocChooserNode(&Emperor_Chooser_Chooserarray, Chooserarrayraw, Chooserarrayattr);
  704.         Emperor_AllocClicktabNode(&Emperor_Clicktab_Chooserarray, Chooserarrayraw, Chooserarrayattr);
  705.         Emperor_AllocListbrowserNode(&Emperor_Listbrowser_Chooserarray, Chooserarrayraw, Chooserarrayattr);
  706.         Emperor_AllocRadiobuttonNode(&Emperor_Radiobutton_Chooserarray, Chooserarrayraw, Chooserarrayattr);
  707.     }
  708.     Emperor_AllocListbrowserGadToolsNode(&Emperor_Listbrowser_GadTools_Chooserarray, Chooserarrayraw);
  709.     if(os35)
  710.     {
  711.         Emperor_AllocChooserNode(&Emperor_Chooser_founded_files_list, founded_files_listraw, founded_files_listattr);
  712.         Emperor_AllocClicktabNode(&Emperor_Clicktab_founded_files_list, founded_files_listraw, founded_files_listattr);
  713.         Emperor_AllocListbrowserNode(&Emperor_Listbrowser_founded_files_list, founded_files_listraw, founded_files_listattr);
  714.         Emperor_AllocRadiobuttonNode(&Emperor_Radiobutton_founded_files_list, founded_files_listraw, founded_files_listattr);
  715.     }
  716.     Emperor_AllocListbrowserGadToolsNode(&Emperor_Listbrowser_GadTools_founded_files_list, founded_files_listraw);
  717.     if((os35) && (!Emperor_InitVar))
  718.     {
  719.         WindowObject1 = (Object *) WindowObject,
  720.                         WA_Left, 0,
  721.                         WA_Top, 17,
  722.                         WA_Width, 400,
  723.                         WA_Height, 300,
  724.                         WA_SizeGadget, TRUE,
  725.                         WA_DragBar, TRUE,
  726.                         WA_DepthGadget, TRUE,
  727.                         WA_CloseGadget, TRUE,
  728.                         WA_Activate, TRUE,
  729.                         WA_AutoAdjust, TRUE,
  730.                         WA_IDCMP, IDCMP_GADGETDOWN | IDCMP_GADGETUP | IDCMP_GADGETHELP | IDCMP_MENUPICK | IDCMP_MENUHELP | IDCMP_CLOSEWINDOW | IDCMP_ACTIVEWINDOW | IDCMP_INACTIVEWINDOW | IDCMP_RAWKEY | IDCMP_VANILLAKEY | IDCMP_MOUSEBUTTONS | IDCMP_MOUSEMOVE | IDCMP_NEWSIZE | IDCMP_CHANGEWINDOW | IDCMP_SIZEVERIFY | IDCMP_REFRESHWINDOW | IDCMP_INTUITICKS,
  731.                         WA_MinWidth, 0,
  732.                         WA_MinHeight, 0,
  733.                         WA_MaxWidth, 0,
  734.                         WA_MaxHeight, 0,
  735.                         WA_Title, LOCALE_WINDOW_TITLE1,
  736.                         WA_ScreenTitle, LOCALE_SCREEN_TITLE1,
  737.                         WA_PubScreen, Screen1,
  738.                         WINDOW_GadgetHelp, TRUE,
  739.                         WINDOW_IconifyGadget, FALSE,
  740.                         WINDOW_IconTitle, LOCALE_ICONIFIED_TITLE1,
  741.                         WINDOW_AppPort, AppPort,
  742.                         WINDOW_ParentGroup, (Object *) Gadget1[0] = (Object *) VGroupObject,
  743.                                             LAYOUT_SpaceOuter, TRUE,
  744.                                             LAYOUT_DeferLayout, TRUE,
  745.                                             LAYOUT_AddChild, (Object *) Gadget1[1] = (Object *) LayoutObject,
  746.                                                              GA_ID, 0,
  747.                                                              GA_RelVerify, TRUE,
  748.                                                              GA_GadgetHelp, TRUE,
  749.                                                              GA_UserData, "",
  750.                                                              LAYOUT_Label, "",
  751.                                                              LAYOUT_Orientation, 1,
  752.                                                              LAYOUT_HorizAlignment, LALIGN_LEFT,
  753.                                                              LAYOUT_VertAlignment, LALIGN_TOP,
  754.                                                              LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  755.                                                              LAYOUT_BevelState, IDS_NORMAL,
  756.                                                              LAYOUT_BevelStyle, 4,
  757.                                                              LAYOUT_AddChild, (Object *) Gadget1[2] = (Object *) LayoutObject,
  758.                                                                               GA_ID, 1,
  759.                                                                               GA_RelVerify, TRUE,
  760.                                                                               GA_GadgetHelp, TRUE,
  761.                                                                               GA_UserData, "",
  762.                                                                               LAYOUT_Label, "",
  763.                                                                               LAYOUT_Orientation, 0,
  764.                                                                               LAYOUT_HorizAlignment, LALIGN_LEFT,
  765.                                                                               LAYOUT_VertAlignment, LALIGN_TOP,
  766.                                                                               LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  767.                                                                               LAYOUT_BevelState, IDS_NORMAL,
  768.                                                                               LAYOUT_BevelStyle, 4,
  769.                                                                               LAYOUT_AddChild, (Object *) Gadget1[3] = (Object *) LayoutObject,
  770.                                                                                                GA_ID, 2,
  771.                                                                                                GA_RelVerify, TRUE,
  772.                                                                                                GA_GadgetHelp, TRUE,
  773.                                                                                                GA_UserData, "",
  774.                                                                                                LAYOUT_Label, "",
  775.                                                                                                LAYOUT_Orientation, 1,
  776.                                                                                                LAYOUT_HorizAlignment, LALIGN_LEFT,
  777.                                                                                                LAYOUT_VertAlignment, LALIGN_TOP,
  778.                                                                                                LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  779.                                                                                                LAYOUT_BevelState, IDS_NORMAL,
  780.                                                                                                LAYOUT_BevelStyle, 4,
  781.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[4] = (Object *) StringObject,
  782.                                                                                                                 GA_ID, 3,
  783.                                                                                                                 GA_RelVerify, TRUE,
  784.                                                                                                                 GA_GadgetHelp, TRUE,
  785.                                                                                                                 GA_TabCycle, TRUE,
  786.                                                                                                                 GA_UserData, GADHELP_STRING1,
  787.                                                                                                                 STRINGA_TextVal, "",
  788.                                                                                                                 STRINGA_MaxChars, 30,
  789.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  790.                                                                                                                 STRINGA_MinVisible, 10,
  791.                                                                                                End,
  792.                                                                                                CHILD_Label, (Object *) Gadget1[5] = (Object *) LabelObject,
  793.                                                                                                                 LABEL_Justification, 0,
  794.                                                                                                                 LABEL_Text, LOCALE_PATTERN1,
  795.                                                                                                End,
  796.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[6] = (Object *) StringObject,
  797.                                                                                                                 GA_ID, 5,
  798.                                                                                                                 GA_RelVerify, TRUE,
  799.                                                                                                                 GA_GadgetHelp, TRUE,
  800.                                                                                                                 GA_TabCycle, TRUE,
  801.                                                                                                                 GA_UserData, GADHELP_STRING2,
  802.                                                                                                                 STRINGA_TextVal, "",
  803.                                                                                                                 STRINGA_MaxChars, 30,
  804.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  805.                                                                                                                 STRINGA_MinVisible, 10,
  806.                                                                                                End,
  807.                                                                                                CHILD_Label, (Object *) Gadget1[7] = (Object *) LabelObject,
  808.                                                                                                                 LABEL_Justification, 0,
  809.                                                                                                                 LABEL_Text, LOCALE_PATTERN2,
  810.                                                                                                End,
  811.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[8] = (Object *) StringObject,
  812.                                                                                                                 GA_ID, 7,
  813.                                                                                                                 GA_RelVerify, TRUE,
  814.                                                                                                                 GA_GadgetHelp, TRUE,
  815.                                                                                                                 GA_TabCycle, TRUE,
  816.                                                                                                                 GA_UserData, GADHELP_STRING3,
  817.                                                                                                                 STRINGA_TextVal, "",
  818.                                                                                                                 STRINGA_MaxChars, 30,
  819.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  820.                                                                                                                 STRINGA_MinVisible, 10,
  821.                                                                                                End,
  822.                                                                                                CHILD_Label, (Object *) Gadget1[9] = (Object *) LabelObject,
  823.                                                                                                                 LABEL_Justification, 0,
  824.                                                                                                                 LABEL_Text, LOCALE_PATTERN3,
  825.                                                                                                End,
  826.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[10] = (Object *) StringObject,
  827.                                                                                                                 GA_ID, 9,
  828.                                                                                                                 GA_RelVerify, TRUE,
  829.                                                                                                                 GA_GadgetHelp, TRUE,
  830.                                                                                                                 GA_TabCycle, TRUE,
  831.                                                                                                                 GA_UserData, GADHELP_STRING4,
  832.                                                                                                                 STRINGA_TextVal, "",
  833.                                                                                                                 STRINGA_MaxChars, 30,
  834.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  835.                                                                                                                 STRINGA_MinVisible, 10,
  836.                                                                                                End,
  837.                                                                                                CHILD_Label, (Object *) Gadget1[11] = (Object *) LabelObject,
  838.                                                                                                                 LABEL_Justification, 0,
  839.                                                                                                                 LABEL_Text, LOCALE_PATTERN4,
  840.                                                                                                End,
  841.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[12] = (Object *) StringObject,
  842.                                                                                                                 GA_ID, 11,
  843.                                                                                                                 GA_RelVerify, TRUE,
  844.                                                                                                                 GA_GadgetHelp, TRUE,
  845.                                                                                                                 GA_TabCycle, TRUE,
  846.                                                                                                                 GA_UserData, GADHELP_STRING5,
  847.                                                                                                                 STRINGA_TextVal, "",
  848.                                                                                                                 STRINGA_MaxChars, 30,
  849.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  850.                                                                                                                 STRINGA_MinVisible, 10,
  851.                                                                                                End,
  852.                                                                                                CHILD_Label, (Object *) Gadget1[13] = (Object *) LabelObject,
  853.                                                                                                                 LABEL_Justification, 0,
  854.                                                                                                                 LABEL_Text, LOCALE_PATTERN5,
  855.                                                                                                End,
  856.                                                                               End,
  857.                                                                               LAYOUT_AddChild, (Object *) Gadget1[14] = (Object *) LayoutObject,
  858.                                                                                                GA_ID, 13,
  859.                                                                                                GA_UserData, "",
  860.                                                                                                LAYOUT_Label, "",
  861.                                                                                                LAYOUT_Orientation, 0,
  862.                                                                                                LAYOUT_HorizAlignment, LALIGN_LEFT,
  863.                                                                                                LAYOUT_VertAlignment, LALIGN_TOP,
  864.                                                                                                LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  865.                                                                                                LAYOUT_BevelState, IDS_NORMAL,
  866.                                                                                                LAYOUT_BevelStyle, 4,
  867.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[15] = (Object *) LayoutObject,
  868.                                                                                                                 GA_ID, 14,
  869.                                                                                                                 GA_UserData, "",
  870.                                                                                                                 LAYOUT_Label, "",
  871.                                                                                                                 LAYOUT_Orientation, 1,
  872.                                                                                                                 LAYOUT_HorizAlignment, LALIGN_LEFT,
  873.                                                                                                                 LAYOUT_VertAlignment, LALIGN_TOP,
  874.                                                                                                                 LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  875.                                                                                                                 LAYOUT_BevelState, IDS_NORMAL,
  876.                                                                                                                 LAYOUT_BevelStyle, 4,
  877.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[16] = (Object *) CheckBoxObject,
  878.                                                                                                                                  GA_ID, 15,
  879.                                                                                                                                  GA_RelVerify, TRUE,
  880.                                                                                                                                  GA_GadgetHelp, TRUE,
  881.                                                                                                                                  GA_Disabled, TRUE,
  882.                                                                                                                                  GA_UserData, GADHELP_CHECK1,
  883.                                                                                                                                  GA_Text, "biz",
  884.                                                                                                                                  CHECKBOX_TextPen, 1,
  885.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  886.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  887.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  888.                                                                                                                 End,
  889.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[17] = (Object *) CheckBoxObject,
  890.                                                                                                                                  GA_ID, 16,
  891.                                                                                                                                  GA_RelVerify, TRUE,
  892.                                                                                                                                  GA_GadgetHelp, TRUE,
  893.                                                                                                                                  GA_Disabled, TRUE,
  894.                                                                                                                                  GA_UserData, GADHELP_CHECK2,
  895.                                                                                                                                  GA_Text, "comm",
  896.                                                                                                                                  CHECKBOX_TextPen, 1,
  897.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  898.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  899.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  900.                                                                                                                 End,
  901.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[18] = (Object *) CheckBoxObject,
  902.                                                                                                                                  GA_ID, 17,
  903.                                                                                                                                  GA_RelVerify, TRUE,
  904.                                                                                                                                  GA_GadgetHelp, TRUE,
  905.                                                                                                                                  GA_Disabled, TRUE,
  906.                                                                                                                                  GA_UserData, GADHELP_CHECK3,
  907.                                                                                                                                  GA_Text, "demo",
  908.                                                                                                                                  CHECKBOX_TextPen, 1,
  909.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  910.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  911.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  912.                                                                                                                 End,
  913.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[19] = (Object *) CheckBoxObject,
  914.                                                                                                                                  GA_ID, 18,
  915.                                                                                                                                  GA_RelVerify, TRUE,
  916.                                                                                                                                  GA_GadgetHelp, TRUE,
  917.                                                                                                                                  GA_Disabled, TRUE,
  918.                                                                                                                                  GA_UserData, GADHELP_CHECK4,
  919.                                                                                                                                  GA_Text, "dev",
  920.                                                                                                                                  CHECKBOX_TextPen, 1,
  921.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  922.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  923.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  924.                                                                                                                 End,
  925.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[20] = (Object *) CheckBoxObject,
  926.                                                                                                                                  GA_ID, 19,
  927.                                                                                                                                  GA_RelVerify, TRUE,
  928.                                                                                                                                  GA_GadgetHelp, TRUE,
  929.                                                                                                                                  GA_Disabled, TRUE,
  930.                                                                                                                                  GA_UserData, GADHELP_CHECK5,
  931.                                                                                                                                  GA_Text, "disk",
  932.                                                                                                                                  CHECKBOX_TextPen, 1,
  933.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  934.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  935.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  936.                                                                                                                 End,
  937.                                                                                                End,
  938.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[21] = (Object *) LayoutObject,
  939.                                                                                                                 GA_ID, 20,
  940.                                                                                                                 GA_UserData, "",
  941.                                                                                                                 LAYOUT_Label, "",
  942.                                                                                                                 LAYOUT_Orientation, 1,
  943.                                                                                                                 LAYOUT_HorizAlignment, LALIGN_LEFT,
  944.                                                                                                                 LAYOUT_VertAlignment, LALIGN_TOP,
  945.                                                                                                                 LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  946.                                                                                                                 LAYOUT_BevelState, IDS_NORMAL,
  947.                                                                                                                 LAYOUT_BevelStyle, 4,
  948.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[22] = (Object *) CheckBoxObject,
  949.                                                                                                                                  GA_ID, 21,
  950.                                                                                                                                  GA_RelVerify, TRUE,
  951.                                                                                                                                  GA_GadgetHelp, TRUE,
  952.                                                                                                                                  GA_Disabled, TRUE,
  953.                                                                                                                                  GA_UserData, GADHELP_CHECK6,
  954.                                                                                                                                  GA_Text, "docs",
  955.                                                                                                                                  CHECKBOX_TextPen, 1,
  956.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  957.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  958.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  959.                                                                                                                 End,
  960.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[23] = (Object *) CheckBoxObject,
  961.                                                                                                                                  GA_ID, 22,
  962.                                                                                                                                  GA_RelVerify, TRUE,
  963.                                                                                                                                  GA_GadgetHelp, TRUE,
  964.                                                                                                                                  GA_Disabled, TRUE,
  965.                                                                                                                                  GA_UserData, GADHELP_CHECK7,
  966.                                                                                                                                  GA_Text, "game",
  967.                                                                                                                                  CHECKBOX_TextPen, 1,
  968.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  969.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  970.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  971.                                                                                                                 End,
  972.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[24] = (Object *) CheckBoxObject,
  973.                                                                                                                                  GA_ID, 23,
  974.                                                                                                                                  GA_RelVerify, TRUE,
  975.                                                                                                                                  GA_GadgetHelp, TRUE,
  976.                                                                                                                                  GA_Disabled, TRUE,
  977.                                                                                                                                  GA_UserData, GADHELP_CHECK8,
  978.                                                                                                                                  GA_Text, "gfx",
  979.                                                                                                                                  CHECKBOX_TextPen, 1,
  980.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  981.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  982.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  983.                                                                                                                 End,
  984.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[25] = (Object *) CheckBoxObject,
  985.                                                                                                                                  GA_ID, 24,
  986.                                                                                                                                  GA_RelVerify, TRUE,
  987.                                                                                                                                  GA_GadgetHelp, TRUE,
  988.                                                                                                                                  GA_Disabled, TRUE,
  989.                                                                                                                                  GA_UserData, GADHELP_CHECK9,
  990.                                                                                                                                  GA_Text, "hard",
  991.                                                                                                                                  CHECKBOX_TextPen, 1,
  992.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  993.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  994.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  995.                                                                                                                 End,
  996.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[26] = (Object *) CheckBoxObject,
  997.                                                                                                                                  GA_ID, 25,
  998.                                                                                                                                  GA_RelVerify, TRUE,
  999.                                                                                                                                  GA_GadgetHelp, TRUE,
  1000.                                                                                                                                  GA_Disabled, TRUE,
  1001.                                                                                                                                  GA_UserData, GADHELP_CHECK10,
  1002.                                                                                                                                  GA_Text, "misc",
  1003.                                                                                                                                  CHECKBOX_TextPen, 1,
  1004.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1005.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1006.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1007.                                                                                                                 End,
  1008.                                                                                                End,
  1009.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[27] = (Object *) LayoutObject,
  1010.                                                                                                                 GA_ID, 26,
  1011.                                                                                                                 GA_UserData, "",
  1012.                                                                                                                 LAYOUT_Label, "",
  1013.                                                                                                                 LAYOUT_Orientation, 1,
  1014.                                                                                                                 LAYOUT_HorizAlignment, LALIGN_LEFT,
  1015.                                                                                                                 LAYOUT_VertAlignment, LALIGN_TOP,
  1016.                                                                                                                 LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  1017.                                                                                                                 LAYOUT_BevelState, IDS_NORMAL,
  1018.                                                                                                                 LAYOUT_BevelStyle, 4,
  1019.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[28] = (Object *) CheckBoxObject,
  1020.                                                                                                                                  GA_ID, 27,
  1021.                                                                                                                                  GA_RelVerify, TRUE,
  1022.                                                                                                                                  GA_GadgetHelp, TRUE,
  1023.                                                                                                                                  GA_Disabled, TRUE,
  1024.                                                                                                                                  GA_UserData, GADHELP_CHECK11,
  1025.                                                                                                                                  GA_Text, "mods",
  1026.                                                                                                                                  CHECKBOX_TextPen, 1,
  1027.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1028.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1029.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1030.                                                                                                                 End,
  1031.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[29] = (Object *) CheckBoxObject,
  1032.                                                                                                                                  GA_ID, 28,
  1033.                                                                                                                                  GA_RelVerify, TRUE,
  1034.                                                                                                                                  GA_GadgetHelp, TRUE,
  1035.                                                                                                                                  GA_Disabled, TRUE,
  1036.                                                                                                                                  GA_UserData, GADHELP_CHECK12,
  1037.                                                                                                                                  GA_Text, "mus",
  1038.                                                                                                                                  CHECKBOX_TextPen, 1,
  1039.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1040.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1041.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1042.                                                                                                                 End,
  1043.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[30] = (Object *) CheckBoxObject,
  1044.                                                                                                                                  GA_ID, 29,
  1045.                                                                                                                                  GA_RelVerify, TRUE,
  1046.                                                                                                                                  GA_GadgetHelp, TRUE,
  1047.                                                                                                                                  GA_Disabled, TRUE,
  1048.                                                                                                                                  GA_UserData, GADHELP_CHECK13,
  1049.                                                                                                                                  GA_Text, "_pix",
  1050.                                                                                                                                  CHECKBOX_TextPen, 1,
  1051.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1052.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1053.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1054.                                                                                                                 End,
  1055.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[31] = (Object *) CheckBoxObject,
  1056.                                                                                                                                  GA_ID, 30,
  1057.                                                                                                                                  GA_RelVerify, TRUE,
  1058.                                                                                                                                  GA_GadgetHelp, TRUE,
  1059.                                                                                                                                  GA_Disabled, TRUE,
  1060.                                                                                                                                  GA_UserData, GADHELP_CHECK14,
  1061.                                                                                                                                  GA_Text, "text",
  1062.                                                                                                                                  CHECKBOX_TextPen, 1,
  1063.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1064.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1065.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1066.                                                                                                                 End,
  1067.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[32] = (Object *) CheckBoxObject,
  1068.                                                                                                                                  GA_ID, 31,
  1069.                                                                                                                                  GA_RelVerify, TRUE,
  1070.                                                                                                                                  GA_GadgetHelp, TRUE,
  1071.                                                                                                                                  GA_Disabled, TRUE,
  1072.                                                                                                                                  GA_UserData, GADHELP_CHECK15,
  1073.                                                                                                                                  GA_Text, "util",
  1074.                                                                                                                                  CHECKBOX_TextPen, 1,
  1075.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1076.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1077.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1078.                                                                                                                 End,
  1079.                                                                                                End,
  1080.                                                                               End,
  1081.                                                                               LAYOUT_AddChild, (Object *) Gadget1[33] = (Object *) LayoutObject,
  1082.                                                                                                GA_ID, 32,
  1083.                                                                                                GA_UserData, "",
  1084.                                                                                                LAYOUT_Label, "",
  1085.                                                                                                LAYOUT_Orientation, 1,
  1086.                                                                                                LAYOUT_HorizAlignment, LALIGN_LEFT,
  1087.                                                                                                LAYOUT_VertAlignment, LALIGN_TOP,
  1088.                                                                                                LAYOUT_LabelPlace, BVJ_TOP_LEFT,
  1089.                                                                                                LAYOUT_BevelState, IDS_NORMAL,
  1090.                                                                                                LAYOUT_BevelStyle, 4,
  1091.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[34] = (Object *) CheckBoxObject,
  1092.                                                                                                                 GA_ID, 33,
  1093.                                                                                                                 GA_RelVerify, TRUE,
  1094.                                                                                                                 GA_GadgetHelp, TRUE,
  1095.                                                                                                                 GA_UserData, GADHELP_CHECK16,
  1096.                                                                                                                 GA_Text, LOCALE_SCAN_IN_LHA,
  1097.                                                                                                                 CHECKBOX_TextPen, 1,
  1098.                                                                                                                 CHECKBOX_FillTextPen, 1,
  1099.                                                                                                                 CHECKBOX_BackgroundPen, 0,
  1100.                                                                                                                 CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1101.                                                                                                End,
  1102.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[35] = (Object *) CheckBoxObject,
  1103.                                                                                                                 GA_ID, 34,
  1104.                                                                                                                 GA_RelVerify, TRUE,
  1105.                                                                                                                 GA_GadgetHelp, TRUE,
  1106.                                                                                                                 GA_Disabled, TRUE,
  1107.                                                                                                                 GA_UserData, GADHELP_CHECK17,
  1108.                                                                                                                 GA_Text, LOCALE_SINGLE_CDs,
  1109.                                                                                                                 CHECKBOX_TextPen, 1,
  1110.                                                                                                                 CHECKBOX_FillTextPen, 1,
  1111.                                                                                                                 CHECKBOX_BackgroundPen, 0,
  1112.                                                                                                                 CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1113.                                                                                                End,
  1114.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[36] = (Object *) SpaceObject,
  1115.                                                                                                                 GA_ID, 35,
  1116.                                                                                                                 GA_RelVerify, TRUE,
  1117.                                                                                                                 GA_GadgetHelp, TRUE,
  1118.                                                                                                                 GA_UserData, "",
  1119.                                                                                                                 SPACE_BevelStyle, 4,
  1120.                                                                                                End,
  1121.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[37] = (Object *) ChooserObject,
  1122.                                                                                                                 GA_ID, 36,
  1123.                                                                                                                 GA_RelVerify, TRUE,
  1124.                                                                                                                 GA_GadgetHelp, TRUE,
  1125.                                                                                                                 GA_UserData, GADHELP_CHOOSER,
  1126.                                                                                                                 CHOOSER_Title, "",
  1127.                                                                                                                 CHOOSER_AutoFit, TRUE,
  1128.                                                                                                                 CHOOSER_PopUp, TRUE,
  1129.                                                                                                                 CHOOSER_MaxLabels, 10,
  1130.                                                                                                                 CHOOSER_Offset, 0,
  1131.                                                                                                                 CHOOSER_Selected, -1,
  1132.                                                                                                                 CHOOSER_Labels, (ULONG) &Emperor_Chooser_Chooserarray,
  1133.                                                                                                End,
  1134.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[38] = (Object *) ButtonObject,
  1135.                                                                                                                 GA_ID, 37,
  1136.                                                                                                                 GA_RelVerify, TRUE,
  1137.                                                                                                                 GA_GadgetHelp, TRUE,
  1138.                                                                                                                 GA_UserData, GADHELP_BUTTON1,
  1139.                                                                                                                 GA_Text, LOCALE_SEARCH,
  1140.                                                                                                                 BUTTON_AutoButton, 0,
  1141.                                                                                                                 BUTTON_BevelStyle, 1,
  1142.                                                                                                                 BUTTON_Justification, 1,
  1143.                                                                                                End,
  1144.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[39] = (Object *) ButtonObject,
  1145.                                                                                                                 GA_ID, 38,
  1146.                                                                                                                 GA_RelVerify, TRUE,
  1147.                                                                                                                 GA_GadgetHelp, TRUE,
  1148.                                                                                                                 GA_Disabled, TRUE,
  1149.                                                                                                                 GA_UserData, GADHELP_BUTTON2,
  1150.                                                                                                                 GA_Text, LOCALE_BREAK,
  1151.                                                                                                                 BUTTON_AutoButton, 0,
  1152.                                                                                                                 BUTTON_BevelStyle, 1,
  1153.                                                                                                                 BUTTON_Justification, 1,
  1154.                                                                                                End,
  1155.                                                                               End,
  1156.                                                              End,
  1157.                                                              CHILD_MaxHeight, 35,
  1158.                                                              LAYOUT_AddChild, (Object *) Gadget1[40] = (Object *) ListBrowserObject,
  1159.                                                                               GA_ID, 39,
  1160.                                                                               GA_RelVerify, TRUE,
  1161.                                                                               GA_GadgetHelp, TRUE,
  1162.                                                                               GA_UserData, GADHELP_LISTBROWSER,
  1163.                                                                               GA_TextAttr, &XEN1,
  1164.                                                                               LISTBROWSER_Labels, (ULONG) &Emperor_Listbrowser_founded_files_list,
  1165.                                                                               LISTBROWSER_ColumnInfo, (ULONG) &ListbrowserColumnInfo,
  1166.                                                                               LISTBROWSER_AutoFit, TRUE,
  1167.                                                                               LISTBROWSER_ColumnTitles, TRUE,
  1168.                                                                               LISTBROWSER_ShowSelected, TRUE,
  1169.                                                                               LISTBROWSER_VerticalProp, TRUE,
  1170.                                                                               LISTBROWSER_HorizontalProp, TRUE,
  1171.                                                                               LISTBROWSER_VertSeparators, TRUE,
  1172.                                                              End,
  1173.                                                              LAYOUT_AddChild, (Object *) Gadget1[41] = (Object *) FuelGaugeObject,
  1174.                                                                               GA_ID, 40,
  1175.                                                                               GA_RelVerify, TRUE,
  1176.                                                                               GA_GadgetHelp, TRUE,
  1177.                                                                               GA_UserData, GADHELP_FUELGAUGE1,
  1178.                                                                               FUELGAUGE_Min, 0,
  1179.                                                                               FUELGAUGE_Ticks, 9,
  1180.                                                                               FUELGAUGE_Max, 100,
  1181.                                                                               FUELGAUGE_TickSize, 5,
  1182.                                                                               FUELGAUGE_ShortTicks, 8,
  1183.                                                                               FUELGAUGE_Percent, TRUE,
  1184.                                                                               FUELGAUGE_Justification, 0,
  1185.                                                                               FUELGAUGE_Orientation, 0,
  1186.                                                              End,
  1187.                                                              CHILD_MaxHeight, 35,
  1188.                                                              LAYOUT_AddChild, (Object *) Gadget1[42] = (Object *) FuelGaugeObject,
  1189.                                                                               GA_ID, 41,
  1190.                                                                               GA_RelVerify, TRUE,
  1191.                                                                               GA_GadgetHelp, TRUE,
  1192.                                                                               GA_UserData, GADHELP_FUELGAUGE2,
  1193.                                                                               FUELGAUGE_Min, 0,
  1194.                                                                               FUELGAUGE_Ticks, 9,
  1195.                                                                               FUELGAUGE_Max, 100,
  1196.                                                                               FUELGAUGE_TickSize, 5,
  1197.                                                                               FUELGAUGE_ShortTicks, 8,
  1198.                                                                               FUELGAUGE_Percent, TRUE,
  1199.                                                                               FUELGAUGE_Justification, 0,
  1200.                                                                               FUELGAUGE_Orientation, 0,
  1201.                                                              End,
  1202.                                                              CHILD_MaxHeight, 35,
  1203.                                                              LAYOUT_AddChild, (Object *) Gadget1[43] = (Object *) StringObject,
  1204.                                                                               GA_ID, 42,
  1205.                                                                               GA_RelVerify, TRUE,
  1206.                                                                               GA_GadgetHelp, TRUE,
  1207.                                                                               GA_TabCycle, TRUE,
  1208.                                                                               GA_ReadOnly, TRUE,
  1209.                                                                               GA_UserData, GADHELP_STRING6,
  1210.                                                                               STRINGA_TextVal, "Status: ok",
  1211.                                                                               STRINGA_MaxChars, 100,
  1212.                                                                               STRINGA_Justification, GACT_STRINGLEFT,
  1213.                                                              End,
  1214.                                             End,
  1215.                         EndGroup,
  1216.         EndWindow;
  1217.     }
  1218.  
  1219.     if(Emperor_InitVar)
  1220.     {
  1221.         strcpy(Emperor_ExceptionString, "Error during initialization:\n\n");
  1222.         switch(Emperor_InitVar)
  1223.         {
  1224.             case 1: strcat(Emperor_ExceptionString, "Can't open Amiga-library\n\"");
  1225.                     strcat(Emperor_ExceptionString, Emperor_OccuredError);
  1226.                     strcat(Emperor_ExceptionString, "\"\n\nProbably you haven't got a\ncorrect installed AmigaOS system !");
  1227.                     break;
  1228.             case 5: strcat(Emperor_ExceptionString, "Can't lock your public-screen."); break;
  1229.             case 6: strcat(Emperor_ExceptionString, "Can't get visualinfo of your public-screen."); break;
  1230.             case 7: strcat(Emperor_ExceptionString, "Can't create menu."); break;
  1231.             case 8: strcat(Emperor_ExceptionString, "Can't create message-port."); break;
  1232.         }
  1233.         if(Emperor_InitVar >= 5) strcat(Emperor_ExceptionString, "\n\nMaybe there isn't enough memory !");
  1234.         EmperorRequest_InitializationErrorRequest.es_StructSize = sizeof(struct EasyStruct);
  1235.         EmperorRequest_InitializationErrorRequest.es_Flags = 0L;
  1236.         EmperorRequest_InitializationErrorRequest.es_Title = (UBYTE *) "Program error";
  1237.         EmperorRequest_InitializationErrorRequest.es_TextFormat = (UBYTE *) Emperor_ExceptionString;
  1238.         EmperorRequest_InitializationErrorRequest.es_GadgetFormat = (UBYTE *) "Okay";
  1239.         EasyRequest(NULL, &EmperorRequest_InitializationErrorRequest, NULL, NULL);
  1240.         Emperor_QuitProgram();
  1241.     }
  1242.     else
  1243.     {
  1244.         SetProgramName("AminetSearcher");
  1245.     }
  1246. }
  1247.  
  1248. void Emperor_QuitProgram(void)
  1249. {
  1250.     Emperor_CloseWindow_Window1();
  1251.     if(WindowObject1) DisposeObject(WindowObject1);
  1252.     if(AppPort) DeleteMsgPort(AppPort);
  1253.     if(MsgPort) DeletePort(MsgPort);
  1254.     if(Menu) FreeMenus(Menu);
  1255.     if(vinfo) FreeVisualInfo(vinfo);
  1256.     if(Screen1) UnlockPubScreen(NULL, Screen1);
  1257.     if(Catalog) CloseCatalog(Catalog);
  1258.     if(LabelBase) CloseLibrary(LabelBase);
  1259.     if(GlyphBase) CloseLibrary(GlyphBase);
  1260.     if(BitMapBase) CloseLibrary(BitMapBase);
  1261.     if(BevelBase) CloseLibrary(BevelBase);
  1262.     if(TextEditorBase) CloseLibrary(TextEditorBase);
  1263.     if(TapeDeckBase) CloseLibrary(TapeDeckBase);
  1264.     if(StringBase) CloseLibrary(StringBase);
  1265.     if(SpeedBarBase) CloseLibrary(SpeedBarBase);
  1266.     if(SpaceBase) CloseLibrary(SpaceBase);
  1267.     if(SliderBase) CloseLibrary(SliderBase);
  1268.     if(ScrollerBase) CloseLibrary(ScrollerBase);
  1269.     if(RadioButtonBase) CloseLibrary(RadioButtonBase);
  1270.     if(PaletteBase) CloseLibrary(PaletteBase);
  1271.     if(ListBrowserBase) CloseLibrary(ListBrowserBase);
  1272.     if(LayoutBase) CloseLibrary(LayoutBase);
  1273.     if(IntegerBase) CloseLibrary(IntegerBase);
  1274.     if(GradientSliderBase) CloseLibrary(GradientSliderBase);
  1275.     if(GetScreenModeBase) CloseLibrary(GetScreenModeBase);
  1276.     if(GetFontBase) CloseLibrary(GetFontBase);
  1277.     if(GetFileBase) CloseLibrary(GetFileBase);
  1278.     if(FuelGaugeBase) CloseLibrary(FuelGaugeBase);
  1279.     if(DateBrowserBase) CloseLibrary(DateBrowserBase);
  1280.     if(ColorWheelBase) CloseLibrary(ColorWheelBase);
  1281.     if(ClickTabBase) CloseLibrary(ClickTabBase);
  1282.     if(ChooserBase) CloseLibrary(ChooserBase);
  1283.     if(CheckBoxBase) CloseLibrary(CheckBoxBase);
  1284.     if(ButtonBase) CloseLibrary(ButtonBase);
  1285.     if(RequesterBase) CloseLibrary(RequesterBase);
  1286.     if(WindowBase) CloseLibrary(WindowBase);
  1287.     if(ResourceBase) CloseLibrary(ResourceBase);
  1288.     if(DOSLibBase) CloseLibrary(DOSLibBase);
  1289.     if(ASLBase) CloseLibrary(ASLBase);
  1290.     if(GadToolsBase) CloseLibrary(GadToolsBase);
  1291.     if(LocaleBase) CloseLibrary(LocaleBase);
  1292.     if(IntuitionBase) CloseLibrary(IntuitionBase);
  1293.     exit(0);
  1294. }
  1295.  
  1296. void Emperor_CloseWindow_Window1(void)
  1297. {
  1298.     if(os35)
  1299.     {
  1300.         if(Menu) ClearMenuStrip(Window1);
  1301.         DoMethod(WindowObject1, WM_CLOSE, NULL);
  1302.         Window1 = NULL;
  1303.         WindowSignals1 = 0L;
  1304.     }
  1305. }
  1306.  
  1307. struct Window *Emperor_OpenWindow_Window1(void)
  1308. {
  1309.     if(os35)
  1310.     {
  1311.         Window1 = RA_OpenWindow(WindowObject1);
  1312.         GetAttr(WINDOW_SigMask, WindowObject1, &WindowSignals1);
  1313.         SetMenuStrip(Window1, Menu);
  1314.     }
  1315.     return(Window1);
  1316. }
  1317.  
  1318. STRPTR Emperor_GetGadgetAttr(struct Gadget *Emperor_GadgetName)
  1319. {
  1320.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1321.     STRPTR Emperor_GadgetAttrReturn = "";
  1322.  
  1323.     Emperor_GadgetAttrBuffer = 0L;
  1324.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 1023;Emperor_GadgetCounter++)
  1325.     {
  1326.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1327.         {
  1328.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1329.             {
  1330.                 case 0:
  1331.                     GetAttr(GA_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1332.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1333.                     break;
  1334.                 case 1:
  1335.                     GetAttr(GA_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1336.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1337.                     break;
  1338.                 case 2:
  1339.                     GetAttr(CHOOSER_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1340.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1341.                     break;
  1342.                 case 3:
  1343.                     GetAttr(CLICKTAB_Current, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1344.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1345.                     break;
  1346.                 case 6:
  1347.                     GetAttr(FUELGAUGE_Level, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1348.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1349.                     break;
  1350.                 case 10:
  1351.                     GetAttr(GRAD_CurVal, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1352.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1353.                     break;
  1354.                 case 11:
  1355.                     GetAttr(INTEGER_Number, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1356.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1357.                     break;
  1358.                 case 13:
  1359.                     GetAttr(LISTBROWSER_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1360.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1361.                     break;
  1362.                 case 14:
  1363.                     GetAttr(PALETTE_Colour, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1364.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1365.                     break;
  1366.                 case 15:
  1367.                     GetAttr(RADIOBUTTON_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1368.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1369.                     break;
  1370.                 case 16:
  1371.                     GetAttr(SCROLLER_Top, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1372.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1373.                     break;
  1374.                 case 17:
  1375.                     GetAttr(SLIDER_Level, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1376.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1377.                     break;
  1378.                 case 19:
  1379.                     GetAttr(SPEEDBAR_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1380.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1381.                     break;
  1382.                 case 20:
  1383.                     GetAttr(STRINGA_TextVal, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1384.                     strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1385.                     break;
  1386.                 case 22:
  1387.                     GetAttr(GA_TEXTEDITOR_Contents, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1388.                     strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1389.                     break;
  1390.             }
  1391.             break;
  1392.         }
  1393.     }
  1394.     return(Emperor_GadgetAttrReturn);
  1395. }
  1396.  
  1397. void Emperor_SetGadgetAttr(struct Gadget *Emperor_GadgetName, STRPTR Emperor_GadgetValue)
  1398. {
  1399.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1400.     struct Window *Emperor_Whichwindow = NULL;
  1401.  
  1402.     Emperor_GadgetAttrBuffer = 0L;
  1403.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 1023;Emperor_GadgetCounter++)
  1404.     {
  1405.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1406.         {
  1407.             Emperor_Whichwindow = Window1;
  1408.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1409.             {
  1410.                 case 0:
  1411.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1412.                     break;
  1413.                 case 1:
  1414.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1415.                     break;
  1416.                 case 2:
  1417.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1418.                     break;
  1419.                 case 3:
  1420.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Current, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1421.                     break;
  1422.                 case 6:
  1423.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, FUELGAUGE_Level, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1424.                     break;
  1425.                 case 10:
  1426.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, INTEGER_Number, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1427.                     break;
  1428.                 case 11:
  1429.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GRAD_CurVal, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1430.                     break;
  1431.                 case 13:
  1432.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1433.                     break;
  1434.                 case 14:
  1435.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, PALETTE_Colour, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1436.                     break;
  1437.                 case 15:
  1438.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1439.                     break;
  1440.                 case 16:
  1441.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SCROLLER_Top, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1442.                     break;
  1443.                 case 17:
  1444.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SLIDER_Level, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1445.                     break;
  1446.                 case 19:
  1447.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SPEEDBAR_Selected, Emperor_GadgetValue, TAG_DONE);
  1448.                     break;
  1449.                 case 20:
  1450.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, STRINGA_TextVal, Emperor_GadgetValue, TAG_DONE);
  1451.                     break;
  1452.                 case 22:
  1453.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_TEXTEDITOR_Contents, Emperor_GadgetValue, TAG_DONE);
  1454.                     break;
  1455.             }
  1456.             if(Emperor_GadgetAttrBuffer) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1457.             break;
  1458.         }
  1459.     }
  1460. }
  1461.  
  1462. void Emperor_SetGadgetAttrComplex(struct Gadget *Emperor_GadgetName, ULONG Emperor_GadgetFlagMask, STRPTR Emperor_GadgetValue)
  1463. {
  1464.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1465.     struct Window *Emperor_Whichwindow = NULL;
  1466.  
  1467.     Emperor_GadgetAttrBuffer = 0L;
  1468.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1469.     {
  1470.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1471.         {
  1472.             Emperor_Whichwindow = Window1;
  1473.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1474.             {
  1475.                 case 0:
  1476.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1477.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1478.                     break;
  1479.                 case 1:
  1480.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1481.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1482.                     break;
  1483.                 case 2:
  1484.                     if(Emperor_GadgetFlagMask == CHOOSER_Title) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Title, Emperor_GadgetValue, TAG_DONE);
  1485.                     else
  1486.                     {
  1487.                         if(Emperor_GadgetFlagMask == CHOOSER_Labels)
  1488.                         {
  1489.                             SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Labels, (ULONG) ~0, TAG_DONE);
  1490.                             if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Labels, Emperor_GadgetValue, TAG_DONE);
  1491.                             Emperor_GadgetAttrBuffer = 1;
  1492.                         }
  1493.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1494.                     }
  1495.                     break;
  1496.                 case 3:
  1497.                     if(Emperor_GadgetFlagMask == CLICKTAB_Labels)
  1498.                     {
  1499.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Labels, (ULONG) ~0, TAG_DONE);
  1500.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Labels, Emperor_GadgetValue, TAG_DONE);
  1501.                         Emperor_GadgetAttrBuffer = 1;
  1502.                     }
  1503.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1504.                     break;
  1505.                 case 4:
  1506.                     if(Emperor_GadgetFlagMask == WHEEL_Abbrv) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, WHEEL_Abbrv, Emperor_GadgetValue, TAG_DONE);
  1507.                     else
  1508.                     {
  1509.                         if((Emperor_GadgetFlagMask == WHEEL_Red) || (Emperor_GadgetFlagMask == WHEEL_Green) || (Emperor_GadgetFlagMask == WHEEL_Blue) || (Emperor_GadgetFlagMask == WHEEL_Hue) || (Emperor_GadgetFlagMask == WHEEL_Saturation) || (Emperor_GadgetFlagMask == WHEEL_Brightness)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue) << 24, TAG_DONE);
  1510.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1511.                     }
  1512.                     break;
  1513.                 case 5:
  1514.                     if(Emperor_GadgetFlagMask == DATEBROWSER_DayTitles) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, DATEBROWSER_DayTitles, Emperor_GadgetValue, TAG_DONE);
  1515.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1516.                     break;
  1517.                 case 6:
  1518.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1519.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1520.                     break;
  1521.                 case 7:
  1522.                     if((Emperor_GadgetFlagMask == GETFILE_TitleText) || (Emperor_GadgetFlagMask == GETFILE_File) || (Emperor_GadgetFlagMask == GETFILE_Drawer) || (Emperor_GadgetFlagMask == GETFILE_FullFile) || (Emperor_GadgetFlagMask == GETFILE_Pattern) || (Emperor_GadgetFlagMask == GETFILE_AcceptPattern) || (Emperor_GadgetFlagMask == GETFILE_RejectPattern)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, Emperor_GadgetValue, TAG_DONE);
  1523.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1524.                     break;
  1525.                 case 8:
  1526.                     if(Emperor_GadgetFlagMask == GETFONT_TitleText) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETFONT_TitleText, Emperor_GadgetValue, TAG_DONE);
  1527.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1528.                     break;
  1529.                 case 9:
  1530.                     if(Emperor_GadgetFlagMask == GETSCREENMODE_TitleText) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETSCREENMODE_TitleText, Emperor_GadgetValue, TAG_DONE);
  1531.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1532.                     break;
  1533.                 case 10: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1534.                 case 11: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1535.                 case 13:
  1536.                     if(Emperor_GadgetFlagMask == LISTBROWSER_Labels)
  1537.                     {
  1538.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Labels, (ULONG) ~0, TAG_DONE);
  1539.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Labels, Emperor_GadgetValue, TAG_DONE);
  1540.                         Emperor_GadgetAttrBuffer = 1;
  1541.                     }
  1542.                     else
  1543.                     {
  1544.                         if(Emperor_GadgetFlagMask == LISTBROWSER_ColumnInfo)
  1545.                         {
  1546.                             SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_ColumnInfo, (ULONG) ~0, TAG_DONE);
  1547.                             if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_ColumnInfo, Emperor_GadgetValue, TAG_DONE);
  1548.                             Emperor_GadgetAttrBuffer = 1;
  1549.                         }
  1550.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1551.                     }
  1552.                     break;
  1553.                 case 14: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1554.                 case 15:
  1555.                     if(Emperor_GadgetFlagMask == RADIOBUTTON_Labels)
  1556.                     {
  1557.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Labels, (ULONG) ~0, TAG_DONE);
  1558.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Labels, Emperor_GadgetValue, TAG_DONE);
  1559.                         Emperor_GadgetAttrBuffer = 1;
  1560.                     }
  1561.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1562.                     break;
  1563.                 case 16: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1564.                 case 17: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1565.                 case 18: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1566.                 case 19: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1567.                 case 20:
  1568.                     if((Emperor_GadgetFlagMask == STRINGA_TextVal) || (Emperor_GadgetFlagMask == STRINGA_Buffer) || (Emperor_GadgetFlagMask == STRINGA_UndoBuffer) || (Emperor_GadgetFlagMask == STRINGA_WorkBuffer)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, Emperor_GadgetValue, TAG_DONE);
  1569.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1570.                     break;
  1571.                 case 21: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1572.                 case 22:
  1573.                     if(Emperor_GadgetFlagMask == GA_TEXTEDITOR_Contents) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_TEXTEDITOR_Contents, Emperor_GadgetValue, TAG_DONE);
  1574.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1575.                     break;
  1576.             }
  1577.             if(Emperor_GadgetAttrBuffer) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1578.             break;
  1579.         }
  1580.     }
  1581. }
  1582.  
  1583. void Emperor_SetGadgetDisabledAttr(struct Gadget *Emperor_GadgetName, BOOL Emperor_GadgetValue)
  1584. {
  1585.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1586.     struct Window *Emperor_Whichwindow = NULL;
  1587.  
  1588.     Emperor_GadgetAttrBuffer = 0L;
  1589.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1590.     {
  1591.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1592.         {
  1593.             Emperor_Whichwindow = Window1;
  1594.             Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Disabled, Emperor_GadgetValue, TAG_DONE);
  1595.             if(Emperor_GadgetAttrBuffer) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1596.             break;
  1597.         }
  1598.     }
  1599. }
  1600.  
  1601. void Emperor_AllocChooserNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1602. {
  1603.     WORD Emperor_Counter1 = 0;
  1604.     struct Node *Emperor_Node;
  1605.  
  1606.     if(os35)
  1607.     {
  1608.         NewList(Emperor_List);
  1609.         while(*Emperor_Labels)
  1610.         {
  1611.             Emperor_Node = AllocChooserNode(CNA_Text, *Emperor_Labels, CNA_Disabled, Emperor_Attributes[Emperor_Counter1], CNA_ReadOnly, Emperor_Attributes[Emperor_Counter1 + 1], TAG_DONE);
  1612.             AddTail(Emperor_List, Emperor_Node);
  1613.             Emperor_Labels++;
  1614.             Emperor_Counter1 += 12;
  1615.         }
  1616.     }
  1617. }
  1618.  
  1619. void Emperor_AllocClicktabNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1620. {
  1621.     WORD Emperor_Counter1 = 0, Emperor_Counter2 = 0;
  1622.     struct Node *Emperor_Node;
  1623.  
  1624.     if(os35)
  1625.     {
  1626.         NewList(Emperor_List);
  1627.         while(*Emperor_Labels)
  1628.         {
  1629.             Emperor_Node = AllocClickTabNode(TNA_Text, *Emperor_Labels, TNA_Disabled, Emperor_Attributes[Emperor_Counter1], TNA_Number, Emperor_Counter2, TAG_DONE);
  1630.             AddTail(Emperor_List, Emperor_Node);
  1631.             Emperor_Labels++;
  1632.             Emperor_Counter1 += 12;
  1633.             Emperor_Counter2++;
  1634.         }
  1635.     }
  1636. }
  1637.  
  1638. void Emperor_AllocListbrowserNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1639. {
  1640.     WORD Emperor_Counter1 = 0, Emperor_Counter2 = 0;
  1641.     struct Node *Emperor_Node;
  1642.  
  1643.     if(os35)
  1644.     {
  1645.         NewList(Emperor_List);
  1646.         while(*Emperor_Labels)
  1647.         {
  1648.             Emperor_Counter2 = 0;
  1649.             if(Emperor_Attributes[Emperor_Counter1 + 1]) Emperor_Counter2 += 1;
  1650.             if(Emperor_Attributes[Emperor_Counter1 + 2]) Emperor_Counter2 += 4;
  1651.             if(Emperor_Attributes[Emperor_Counter1 + 3]) Emperor_Counter2 += 8;
  1652.             if(Emperor_Attributes[Emperor_Counter1 + 4]) Emperor_Counter2 += 16;
  1653.             Emperor_Node = AllocListBrowserNode(1, LBNCA_Text, *Emperor_Labels, LBNCA_CopyText, TRUE, LBNA_Generation, Emperor_Attributes[Emperor_Counter1 + 10], LBNA_Column, Emperor_Attributes[Emperor_Counter1 + 11], LBNA_Flags, Emperor_Counter2, LBNA_Selected, Emperor_Attributes[Emperor_Counter1 + 5], LBNA_CheckBox, Emperor_Attributes[Emperor_Counter1 + 6], LBNA_Checked, Emperor_Attributes[Emperor_Counter1 + 7], TAG_DONE);
  1654.             AddTail(Emperor_List, Emperor_Node);
  1655.             Emperor_Labels++;
  1656.             Emperor_Counter1 += 12;
  1657.         }
  1658.     }
  1659. }
  1660.  
  1661. void Emperor_AllocRadiobuttonNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1662. {
  1663.     struct Node *Emperor_Node;
  1664.  
  1665.     if(os35)
  1666.     {
  1667.         NewList(Emperor_List);
  1668.         while(*Emperor_Labels)
  1669.         {
  1670.             Emperor_Node = AllocRadioButtonNode(1, RBNA_Labels, *Emperor_Labels, TAG_DONE);
  1671.             AddTail(Emperor_List, Emperor_Node);
  1672.             Emperor_Labels++;
  1673.         }
  1674.     }
  1675. }
  1676.  
  1677. void Emperor_AllocListbrowserGadToolsNode(struct List *Emperor_List, char **Emperor_Labels)
  1678. {
  1679.     struct Node *Emperor_Node;
  1680.     struct Remember *Emperor_RememberKey;
  1681.  
  1682.     NewList(Emperor_List);
  1683.     while(*Emperor_Labels)
  1684.     {
  1685.         Emperor_Node = (struct Node *) AllocRemember(&Emperor_RememberKey, sizeof(struct Node), MEMF_CLEAR);
  1686.         Emperor_Node->ln_Name = *Emperor_Labels;
  1687.         AddTail(Emperor_List, Emperor_Node);
  1688.         Emperor_Labels++;
  1689.     }
  1690. }
  1691.  
  1692. ULONG stringlength(STRPTR Emperor_StringBuffer)
  1693. {
  1694.     ULONG Emperor_Counter = 0;
  1695.  
  1696.     while(Emperor_StringBuffer[Emperor_Counter] != NULL) Emperor_Counter++;
  1697.     return(Emperor_Counter);
  1698. }
  1699.  
  1700. LONG stringtoint(STRPTR Emperor_StringBuffer)
  1701. {
  1702.     return(atol(Emperor_StringBuffer));
  1703. }
  1704.  
  1705. DOUBLE stringtofloat(STRPTR Emperor_StringBuffer)
  1706. {
  1707.     return(atof(Emperor_StringBuffer));
  1708. }
  1709.  
  1710. STRPTR inttostring(LONG Emperor_NumberBuffer1)
  1711. {
  1712.     LONG Emperor_NumberBuffer2;
  1713.     BYTE Emperor_NumberLength = 0;
  1714.     BYTE Emperor_Counter = 0;
  1715.     char *Emperor_ReturnBuffer = "abcdefghij";
  1716.  
  1717.     strcpy(Emperor_ReturnBuffer, "");
  1718.     Emperor_ReturnBuffer[0] = NULL;
  1719.     if(Emperor_NumberBuffer1 < 0)
  1720.     {
  1721.         strcpy(Emperor_ReturnBuffer, "-");
  1722.         Emperor_NumberBuffer1 = -Emperor_NumberBuffer1;
  1723.     }
  1724.     if(Emperor_NumberBuffer1 > 0) Emperor_NumberLength = 1;
  1725.     if(Emperor_NumberBuffer1/10 > 0) Emperor_NumberLength = 2;
  1726.     if(Emperor_NumberBuffer1/100 > 0) Emperor_NumberLength = 3;
  1727.     if(Emperor_NumberBuffer1/1000 > 0) Emperor_NumberLength = 4;
  1728.     if(Emperor_NumberBuffer1/10000 > 0) Emperor_NumberLength = 5;
  1729.     if(Emperor_NumberBuffer1/100000 > 0) Emperor_NumberLength = 6;
  1730.     if(Emperor_NumberBuffer1/1000000 > 0) Emperor_NumberLength = 7;
  1731.     if(Emperor_NumberBuffer1/10000000 > 0) Emperor_NumberLength = 8;
  1732.     if(Emperor_NumberBuffer1/100000000 > 0) Emperor_NumberLength = 9;
  1733.     if(Emperor_NumberBuffer1 == 0)  strcpy(Emperor_ReturnBuffer, "0");
  1734.     else
  1735.     {
  1736.         Emperor_Counter = Emperor_NumberLength;
  1737.         for(;Emperor_Counter > 0;Emperor_Counter--)
  1738.         {
  1739.             if(Emperor_Counter == 9) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/100000000;
  1740.             if(Emperor_Counter == 8) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/10000000;
  1741.             if(Emperor_Counter == 7) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/1000000;
  1742.             if(Emperor_Counter == 6) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/100000;
  1743.             if(Emperor_Counter == 5) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/10000;
  1744.             if(Emperor_Counter == 4) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/1000;
  1745.             if(Emperor_Counter == 3) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/100;
  1746.             if(Emperor_Counter == 2) Emperor_NumberBuffer2 = Emperor_NumberBuffer1/10;
  1747.             if(Emperor_Counter == 1) Emperor_NumberBuffer2 = Emperor_NumberBuffer1;
  1748.             if(Emperor_NumberBuffer2 == 0) strcat(Emperor_ReturnBuffer, "0");
  1749.             if(Emperor_NumberBuffer2 == 1) strcat(Emperor_ReturnBuffer, "1");
  1750.             if(Emperor_NumberBuffer2 == 2) strcat(Emperor_ReturnBuffer, "2");
  1751.             if(Emperor_NumberBuffer2 == 3) strcat(Emperor_ReturnBuffer, "3");
  1752.             if(Emperor_NumberBuffer2 == 4) strcat(Emperor_ReturnBuffer, "4");
  1753.             if(Emperor_NumberBuffer2 == 5) strcat(Emperor_ReturnBuffer, "5");
  1754.             if(Emperor_NumberBuffer2 == 6) strcat(Emperor_ReturnBuffer, "6");
  1755.             if(Emperor_NumberBuffer2 == 7) strcat(Emperor_ReturnBuffer, "7");
  1756.             if(Emperor_NumberBuffer2 == 8) strcat(Emperor_ReturnBuffer, "8");
  1757.             if(Emperor_NumberBuffer2 == 9) strcat(Emperor_ReturnBuffer, "9");
  1758.             if(Emperor_Counter == 9) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*100000000;
  1759.             if(Emperor_Counter == 8) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*10000000;
  1760.             if(Emperor_Counter == 7) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*1000000;
  1761.             if(Emperor_Counter == 6) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*100000;
  1762.             if(Emperor_Counter == 5) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*10000;
  1763.             if(Emperor_Counter == 4) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*1000;
  1764.             if(Emperor_Counter == 3) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*100;
  1765.             if(Emperor_Counter == 2) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2*10;
  1766.             if(Emperor_Counter == 1) Emperor_NumberBuffer1 -= Emperor_NumberBuffer2;
  1767.         }
  1768.     }
  1769.     return(Emperor_ReturnBuffer);
  1770. }
  1771.  
  1772. #include <AminetSearcher.h>
  1773.